Het volgende voorbeeld geeft de posities van de begin- en eindpunten van de huidige selectie in CodePanes(1)
. De laatste regel in het voorbeeld maakt gebruik van de methode GetSelection om de vier waarden in de vier variabelen te plaatsen.
Dim m As Long
Dim n As Long
Dim x As Long
Dim y As Long
Application.VBE.CodePanes(1).GetSelection m, n, x, y